Group=Cut
Name=MUMUg
Init=coord=0;\nvTplane=1;\n?a1,MUMUTCY,1,50,10;\ncx=cy=0;\n\n
Prog=b1=abs(x-2*a1*int(x/(2*a1))-a1)-1;\nif(b1>=y){\nT=0;\n} \nif((ys-1)-b1<=y){\nT=0;\n} \nb3=abs(y-2*a1*int(y/(2*a1))-a1)-1;\nif(b3>=x){\nT=0;\n} \nif((xs-1)-b3<=x){\nT=0;\n} \n